(calc-record-compilation-date-macro): Return a

simple `setq' form.

diff --git a/lisp/calc/calc-macs.el b/lisp/calc/calc-macs.el
index 1b3ab18e9b633bba7e35f041e0c85115ea8c6775..efe37cf49f973aa2b07c38954574158bd9ec382c 100644 (file)
--- a/lisp/calc/calc-macs.el
+++ b/lisp/calc/calc-macs.el
@@ -26,10 +26,9 @@
 
 
 (defmacro calc-record-compilation-date-macro ()
-  (` (setq calc-installed-date (, (concat (current-time-string)
-                                         " by "
-                                         (user-full-name)))))
-)
+  `(setq calc-installed-date ,(concat (current-time-string)
+                                     " by "
+                                     (user-full-name))))
 
 
 (defmacro calc-wrapper (&rest body)